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SBUG meetings are held the 3rd Tuesday of each month in the 
north east corner of Dysans' building att 

5401 Patrick Henry Drive 
Time - 7i 15 to 10i30 PM Santa Clara, Ca 

February 15, March 15, April 19 



Features! The meeting Mill be chaired by Sabri Kawamh 

1) Lobo Mill give a deminstration of the new 
MAX-80. 

2) Bruce Car so from B fc C Computer visions Mill 
demonstrate the LNW-BO Model II. 

3) Possibly other demininstrations of TRS-BO 
clones (look-alikes). 

4) If there is any time left, Me Mill finish 
Mith Random access... 



Send NeMsletter articles toi 

c/o Robert Byrd, Editor 
South Bay TRS-BO User Group 
P.O. Box 60116 
Sunnyvale, Ca 940B8 

Deadline for the March newsletter is; 25 February B3. 
Please, send articles via modem or saved on disc/tape. I 

Mill see that your media is returned to you. Thanks . . . 



COPYRIGHT <C> 1983 SOUTH BAY TRS-BO USERS GROUP (SBUG). 
WORLD RIGHTS RESERVED. NO PART OF THIS PUBLICATION MAY 

BE STORED IN A RETRIEVAL SYSTEM, TRANSMITTED, OR 
REPRODUCED IN ANY WAY, INCLUDING BUT NOT LIMITED TO, 
PHOTOCOPY, PHOTOGRAPH, MAGNETIC OR OTHER RECORD, WITHOUT 
PRIOR WRITTEN PERMISSION OF THE EDITOR. 
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t»* Your Steering Committee ttt 



SBUG-80 

User name 

(MCHENRY) 

(BREWER) 

(SABRI) 



Discussion Leaders: 

Hike HcHenry 
Eric Brewer 
Sabri Kawash 
Treasurer: 

Larry Gunderson (TREAS) 
Newsletter Editor: 

Robert Byrd (EDITOR) 

Librarians: 

(disc) Berry HcKee (GMCKEE) 

(tape) Gary Dixon (GDIXON) 

(doc.) Bill Richer son 



Phone 

(408) 245-4704 

(40B) 252-9332 

(40B) 732-54B4 

(408) 259-5349 

(40B) 732-6775 

(40B) 926-4063 

(408) 262-6937 

(408) 257-8267 



ttt Other key individuals ttt 



(DAVEFOX) (408) 255-3270 
(EVERYONE) (408) 737-SBUG 



Assistant Ed i tori 

Dave Fox 
Host Computer : 

SBUG-80 
SBUG-BO Sysopsi 

Robert Byrd (EDITOR) (408) 732-6775 

Eric Brewer (BREWER) (408) 252-9332 
I-f the need arises feel free to give one of us a call. 



RX FOR EYESTRAIN 
ON THE MODEL III 

After the SBUG meeting last month and the beautiful 
displays from the amber and green tubes that Rich Black is 
selling, I decided to look at my Model III display again. 

Rich showed me where he had jumpered a resistor on the 
video board to change the voltage to the CRT on the open 
unit he had the green screen on. Although I know just 
about zero about CRTs and their biasing, I decided to take 
a look at the biasing on the existing CRT. 

Don't ask me why these modifications make a 
difference, but I feel that my display is so much better 
than it was that it looks like a different machine. Radio 
Shack had promised me help in improving the display and 
they even wrote me a letter and gave me the name of the 
individual within the company to contact for information, 
since they admitted that there is a problem with the Model 
III display. I wrote to him and, as you might guess, never 
got a reply. (Perhaps Wayne Green is right? Maybe we 
should sell our Tandy stock if that's their attitude!) 

For those who want to try my changes, start by the 
usual disassembly making sure you don't catch the CRT neck 
as you remove the top of the case. Remove the connector 
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and ground lead ^ro. the bottom of the case to the upper 
half and the video board that i» on the side of the top of 
the case. 

On the video board locate the green resistor about as 
big around as a pencil and about 1 inch long. It i s on the 
loner right hand side of the video board. This is R303, 
2.2 kOhms, 3 watts. Right below it is R301, 100 kOhes, 1/2 
watt. Using 1/2 watt resistors, solder across the larger 
resistor, R303, an 1.5 kOhm resistor and across the smaller 
resistor, R301, an IB kOhm resistor. 

Reconnect the connector and ground with the top half 
on its side next to the bottom and power up the machine 
cautiously. You will have to readjust the intensity and 
brightness to see the display. Run a sieple BASIC program 
from cassette BASIC such asi 10 FOR X=l to 9i PRINT X| NEXT 
X: BOTOIO. Now adjust the focus pot which is the small PC 
Mounted pot at the lower left hand edge of the video board. 
Be careful not to touch bare components in the area and 
stay away froe the shell of the CRT and its wiring. 

If you have the experience that I did, you will find 
that the display now looks almost as good as my Model I 
did' You can actually see the characters without 
straining. When you decrease the contrast or brightness, 
the characters fade out uniformly and the horizontal lines 
are not extremely intense as they were before. 

Will this damage the CRT? Beats me 1 Mill this work 
on every Model III? Who knows ! Seriously, I have only 
done this on my own machine. I suspect some experimenting 
with values might be needed. I may even trim mine up a 
little more. One resistor adjusts the level of the 
brightness and allows you to get a bright display at an 
altered setting of the brightness control. The other 
resistor influences the sharpness of the characters and if 
you go too small with it, the characters will break up. 
You need to try this for yourself. I can't see what 
possible harm will come from making the change and even 
though only 1/2 watt resistors are used, even the one 
bridging the 3 watt resistor doesn't even get warm. 

If I shorten the life of my CRT by doing this, then I 
will have a good excuse for buying one of the low glare 
tubes from Rich, which is what I would really like to do 
eventually. I just have a hard time justifying the 
expenditure even though I spend 13-25 hours a week doing 
word processing for school papers or using VISICALC. 

While you have your machine apart, consider putting in 
an NE-2 bulb and series resistor (IBO kOhms - 220 kOhms) 
for a pilot light as was mentioned in BO Micro, I believe. 
It fits nicely against the reset button. Be careful to 
insulate things well and don't let any hot wires get 
exposed. Solder i t to the terminals of the rocker on/off 
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switch nearest the front edge of the keyboard. I fastened 
mine to the l-eyboard matrix shell with some hot melt glue 
so I could be sure it wouldn't move around and short 
against something. I noticed that Rich had put in a pilot 
light 1 i ke this in one of the machines he had. 

Ian Webb 



CREATOR /CMD 

This program was written to bypass having to boot up 
under TRSDOS to sequence a BASIC program properly. The 
program was needed because CREATOR/BAS (reference 80 Micro, 
also available on SBUG-80) writes the program it creates 
out of sequence. 

CREATOR /CMD asks for the name of the program to load, 
searches for it on the disc drives and opens the file. The 
program then replaces the keyboard driver address with the 
address of the read routine for the file you want. It then 
loads and executes BASIC. BASIC (not being too smart) 
doesn't realize that you have tricked it, so it waits for 
you to type something for it to do. It does this by 
calling the keyboard routine (which is now painting at 
CREATOR/CMD) . CREATOR/CMD is sitting quietly in upper 
memory waiting for BASIC to look for a character, so when 
the call comes, it loads a character from the file and 
returns with it in the 'A' register. When CREATOR/CMD runs 
out of characters in the file, it restores the keyboard 
routine pointer, and returns to BASIC with the flags set 
telling it that no character was typed (after closing the 
file) . 

This works because BASIC will insert lines into the 
proper location in the program (based on the line number) 
no matter what sequence they arm typed in. 

This program is a quick job and is not intended to be 
neat. Use it if you need it, and let me know if any 
problems arise. 

61 enn Vaughn 
GLENN a SBUG-BO 

THIS PROGRAM WAS WRITTEN BY GLENN VAUGHN 
IT IS PLACED IN THE PUBLIC DOMAIN WITH THE 
PROVISION THAT IT IS FOR PERSONAL USE ONLY. 
THE PROGRAM IS NOT TO BE SOLD, BUT MAY BE 
COPIED AND GIVEN TO ANYONE WHO WANTS IT. 

THE NEED FOR THIS PROGRAM CAME ABOUT BECAUSE 
NEWD0S80 2.0 DOES NOT RESEQUENCE A BASIC 
PROGRAM WHEN IT IS LOADED. THE CREATOR WRITES 

- 4 - 



South Bay TRS-BO Users Group 



THE PROGRAM IT CREATES OUT OF SEQUENCE, 
REQUIRING THE USE OF SOME DOS OTHER THAN 
NEW0OS8O 2.0 TO LOAD THE PROGRAM SO AS TO 
SEQUENCE IT PROPERLY. THIS PROGRAM WILL 
ELIMINATE THAT NEED. IT TRICKS BASIC INTO 
THINKING <I KNOW, COMPUTERS DON'T THINK), THAT 
THE PROGRAM IS BEING ENTERED FROM THE 
KEYBOARD. AS YOU KNOW, THE LINES OF A PROGRAM 
NEED NOT BE IN SEQUENCE WHEN THEY ARE KEYED, 
BASIC WILL INSERT THEM WHERE THEY BELONG. 

TO RUN THIS PROGRAM, YOU MUST FIRST SET HIMEM 
TO '59999' "HIMEM, 59999< ENTER >" AND EXECUTE 
CREATOR/CMD BY TYPING 'CREATOR' AND PRESSING 
<ENTER>. YOU WILL BE ASKED FOR THE NAME OF THE 
FILE TO LOAD THE PROGRAM WILL SEARCH FOR IT, 
OPEN IT, POINT THE KEYBOARD DEVICE CONTROL 
BLOCK (DCB) TO THE MAIN PROCESSING LOGIC IN 
CREATOR/CMD AND CALL IN BASIC. 
WHEN THE END OF THE INPUT FILE IS REACHED, 
CREATOR/CMD WILL CLOSE IT, RESTORE THE DCB TO 
POINT TO THE REAL KEYBOARD ROUTINE AND RETURN 
TO BASIC TELLING IT THAT NO KEY WAS PRESSED. 



(LOADS INTO HIMEM 
(EXTRACT A FILE SPEC 
(OPEN AN EXISTING FILE 
fit IS AN ERROR IF IT 
;DOES NOT EXIST 
; CLOSE FILE 

I READ 1 BYTE FROM FILE 
(6ET A LINE FROM 
I KEYBOARD. HL POINTS 
I TO THE AREA TO STORE 
(DATA, B CONTAINS THE 
(NUMBER OF BYTES TO 
,GET 

(ROM VIDEO ROUTINE 
(ROM KEYBOARD ROUTINE 
(LOCATION FOR ADDRESS 
(OF KEYBOARD DRIVER 
OF PROGRAM TO LOAD' 





ORG 


60000 


GETFIL 


EQU 


441CH 


OPENE 


EQU 


4424H 


CLOSE 


EQU 


442BH 


READB 


EQU 


0013H 


GETLIN 


EQU 


05D9H 



CRT 


EQU 


033H 


KEY 


EQU 


02BH 


SAVEK 


DEFW 





Ml 


DEFM 


'ENTER NAME 




DEFB 





( 






M2 


DEFB 


ODH 




DEFM 


'PROGRAM NO 




DEFB 


ODH 




DEFM 


'RUN TERMIN 


1 
ENTRY 


DEFB 





LD 


HL,3COOH 




LD 


DE,3COlH 




LD 


BC, 1023 




LD 


<HL),20H 




LDIR 






LD 


HL.3COOH 



(START OF VIDEO RAM 
(START OF VIDEO ♦ 1 
(GONNA CLEAR 1024 BYTES 
(FILL WITH SPACES 
(SPREAD THEM AROUND 
(TO START OF VIDEO 
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LD 


<4020H> ,HL 


CALL 


FINDFL 


ID 


HL, <4016H> 



LD 



ID 



LD 



LD 



JP 



( SAVEK > . HL 

HL.NAIN 

<4016H),HL 

DE,FCB3 

4433H 



j SAVE IN CURSOR LOC 
: ROUTINE GET FILE SPEC, 
5 OPEN IT AND RETURN 
; ADDRESS OF KEYBOARD 
;DRIVFR ROUTINE. WE 
{SAVE IT SO WE CAN 
; RESTORE IT LATER 
;HERE IS WHERE WE SAVE 
I ADDRESS OF KEYBOARD 
{ROUTINE. 

|WE NOW LOAD ADDRESS OF 
| MAIN PROCESSING PART 
I OF THIS PROGRAM. 
{WE STORE IT IN THE 
{ KEYBOARD DCB 
;FCB3 CONTAINS THE 
{CALL TO BASIC. 
|4433H IS THE NEWDOS2.0 
; ROUTINE TO LOAD AND EXECUTE 
;A '/CUD' FILE. THIS ROUTINE 
{WILL NOT RETURN TO THE CALLER, 
I BUT WE DON'T CARE BECAUSE 
(EACH TINE BASIC CALLS FOR 
| A CHARACTER FROM THE KEYBOARD 
I THIS PROGRAM WILL BE INVOKED 



1 






MAIN 


PUSH 


DE 




PUSH 


K 




PUSH 


HL 




LD 


DE,FCB 




CALL 


READB 




JP 


NZ,DONE 



;THE FOLLOWING CODE IS EXECUTED EACH TIME THE KEYBOARD 
{ROUTINE IS CALLED. THE KEYBOARD ROUTINE WILL RETURN 
{WITH THE 'Z' FLAG SET IF NO KEY WAS PRESSED, SO THIS 
{PROGRAM READS A BYTE FROM THE PROGRAM, LOADS IT INTO 
I THE *A' REGISTER, SETS THE 'Z' FLAG OFF C-NZ-) AND 
{RETURNS TO CALLER < BASIC) . THE ONLY REGISTER AFFECTED 
{IS THE 'A' REGISTER. 



SAVE 'DE' REGISTER 

SAVE 'BC' REGISTER 

SAVE 'HL' REGISTER 

POINT TO FILE CONTROL BLOCK 

60 READ 1 BYTE 

NOT ZERO SET IF END OF FILE 

<-NZ-> COULD BE OTHER TYPE 

ERROR BUT WHO CARES, WE 

WOULD HAVE TO CLOSE THE FILE 

AND RESTORE THE KEYBOARD DCB 

ANYWAY. 

SAVE CHARACTER JUST READ 

LOAD 'A' REGISTER WITH 1 

COMPARE IT TO 2 <THIS BETS 

THE 'Z» FLAB OFF C-NZ-) ) 

GET BACK CHARACTER JUST READ 

RESTORE THE 'HL' REGISTER 

RESTORE THE 'BC' REGISTER 

RESTORE THE 'DE' REGISTER 

RETURN TO CALLER 

POINT TO FILE CONTROL BLOCK 

GO CLOSE THE FILE 



DONE 



LD 


D,A 


LD 


A,l 


CP 


2 


LD 


A,D 


POP 


HL 


POP 


BC 


POP 


DE 


RET 




LD 


DE.FCB 


CALL 


CLOSE 
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LD 


(4020H) ,HL 


CALL 


FINDFL 


LD 


HL. (4016H) 



LD 



LD 



LD 



LD 



JP 



(SAVEK),HL 

HL.MAIN 

(4016H),HL 

DE,FCB3 

4433H 



;SAVE IN CURSOR LOC 
•.ROUTINE GET FILE SPEC, 
(OPEN IT AND RETURN 
; ADDRESS OF KEYBOARD 
j DRIVER ROUTINE. WE 
(SAVE IT SO WE CAN 
j RESTORE IT LATER 
;HERE IS WHERE WE SAVE 
; ADDRESS OF KEYBOARD 
( ROUTINE. 

(WE NOW LOAD ADDRESS OF 
; MAIN PROCESSING PART 
(OF THIS PROGRAM. 
;WE STORE IT IN THE 
| KEYBOARD DCB 
|FCB3 CONTAINS THE 
{CALL TO BASIC. 
(4433H IS THE NEWDOS2.0 
; ROUTINE TO LOAD AND EXECUTE 
;A '/CMD» FILE. THIS ROUTINE 
I WILL NOT RETURN TO THE CALLER, 
j BUT WE DON'T CARE BECAUSE 
| EACH TIME BASIC CALLS FOR 
; A CHARACTER FROM THE KEYBOARD 
j THIS PROGRAM WILL BE INVOKED 



I THE FOLLOWING CODE IS EXECUTED EACH TIME THE KEYBOARD 
(ROUTINE IS CALLED. THE KEYBOARD ROUTINE WILL RETURN 
;WITH THE 'Z' FLAG SET IF NO KEY WAS PRESSED, SO THIS 
(PROGRAM READS A BYTE FROM THE PROGRAM, LOADS IT INTO 
I THE 'A' REGISTER, SETS THE ' Z* FLAG OFF (-NZ-) AND 
(RETURNS TO CALLER (BASIC). THE ONLY REGISTER AFFECTED 
(IS THE 'A' REGISTER. 



i 

MAIN 



DONE 



PUSH 

PUSH 

PUSH 

LD 

CALL 

flP 



LD 
LD 

CP 

LD 

POP 

POP 

POP 

RET 

LD 

CALL 



DE (SAVE 'DE' REGISTER 
BC (SAVE 'BC' REGISTER 
HL (SAVE 'HL' REGISTER 
DE,FCB (POINT TO FILE CONTROL BLOCK 
READB (GO READ 1 BYTE 
NZ,DONE (NOT ZERO SET IF END OF FILE 
( (-NZ-) COULD BE OTHER TYPE 
(ERROR BUT WHO CARES, WE 
(WOULD HAVE TO CLOSE THE FILE 
(AND RESTORE THE KEYBOARD DCB 
(ANYWAY. 
D,A (SAVE CHARACTER JUST READ 
A, 1 (LOAD 'A' REGISTER WITH 1 
2 (COMPARE IT TO 2 (THIS SETS 

(THE 'V FLAG OFF (-NZ-) ) 
A,D (GET BACK CHARACTER JUST READ 
HL (RESTORE THE 'HL' RE6ISTER 
BC (RESTORE THE 'BC' REGISTER 
DE (RESTORE THE 'DE' REGISTER 

(RETURN TO CALLER 
DE,FCB (POINT TO FILE CONTROL BLOCK 
CLOSE (GO 'CLOSE THE FILE 
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LD 



LD 



XOR 





POP 


HL 




POP 


PC 




POP 


DE 




RET 




DSPMSG 


LD 


A, (HL) 




OR 


A 




RET 


Z 




CALL 


CRT 




INC 


HL 




JP 


DSPMSG 


ERROR 


JP 


4409H ; 


FINDFL 


LD 


HL,M1 




CALL 


DSPMSG 




LD 


HL.FCB1 




LD 


B,32 




CALL 


GETLIN 




LD 


DE,FCB 




LD 


HL.FCBl 




CALL 


GETFIL 




JP 


NZ, ERROR 




LD 


DE.FCB 




LD 


HL, BUFFER 




LD 


BC,0 




CALL 


OPENE 




JP 


NZ, ERROR 




RET 




FCB 


DEFH 


' 


FCB1 


DEFM 


' 


FCB3 


DEFM 


'BASIC/CMD 




DEFB 


ODH 




DEFM 


* 


BUFFER 


DEFS 


512 




END 


ENTRY 



HL, (SAVEK) ;GET ADDRESS OF THE REAL 

S KEYBOARD DRIVER. 
(4016H),HL ; RESTORE IT IN THE KEYBOARD 
; DEVICE CONTROL BLOCK <DCB) 
A ;ZERO OUT THE 'A' REGISTER 

;THIS ALSO SETS THE 'Z' FLAG (-Z-) 
; RESTORE THE 'HL' REGISTER 
; RESTORE THE 'BC' REGISTER 
; RESTORE THE 'DE' REGISTER 
» RETURN TO BASIC - NEVER TO 
;COME BACK TO THIS PROGRAM 
I GET CHARACTER 
; IS IT A 'OOH'? 
;ALL DONE IF YES 
| DISPLAY IT 
|POINT TO NEXT 
I LOOP TILL DONE 
I JUMP TO DOS AND DISPLAY ERROR 
I POINT TO MESSAGE 
I DISPLAY IT 
tAREA TO STORE FILE NAME 
; LENGTH OF FCB 
|6ET FILE NAME 
I POINT TO FILE CTL BLOCK 
fPOINT TO FILE NAME 
I EX TRACT FILE NAME 
|NZ - INVALID NAME 
I POINT TO EXTRACTED NAME 
I POINT TO FILE BUFFER 
(LOGICAL REC LEN * 256 
;OPEN FILE (EXISTING) 
iNZ « FILE NOT FOUND 



1 INPUT BUFFER 



ROUTINE FOR SPOOLING 
PRINTER OUTPUT 



Our Editor, Rob Byrd, recently asked me to Modify 
SPOOL/CMD to run on the Model III computer. Thanks to Rob, 
I discovered how useful spooling can be. It allows you to 
save all output destined for the printer in a file. You 
can print the file contents later or merge it with other 
files and/or new text using SCRIPS IT to produce a finished 
piece of work. Those of you Mho have Model I's can use 
SPOOL/CMD and the required CLOSE/CMD just as they are 
(available for downloading from SBUG-BO) . It turned out 
that the only modification required for the Model III was 
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to change the memory protect address from 4049H to 441 1H. 
However, I decided to convert to a tNAME routine to enhance 
the use-fulness of the spooling program. 

The modified Assembly Language program will set up 
tNAME routines for spooling printer output to a disk file 
and for closing the file when complete. These routines are 
for the Model III with NEWDOS/80. To activate the routines 
simply run SPOOLSET/CMD by typing SPOOLSET from DOS before 
entering BASIC or other program where printer output will 
be produced. This will set up both the tSPOOL and the 
* CLOSE routines, which may then be used at any time from 
DOS or from MINI-DOS via the 'DFG' keys or from BASIC using 
the command CMD"» SPOOL" or CMD" tCLOSE". 

When you run tSPOOL, you will be asked for FILESPEC? 
Enter the file name you want to use for saving the printer 
output. IMPORTANT* ALWAYS USE tCLOSE WHEN YOU HAVE 
FINISHED SAVING A BATCH OF TEXT! You can then use tSPOOL 
and a new FILESPEC to save additional text. Do not attempt 
to use 'JKL' for screen dump after tSPOOL has been run!! 
There is some kind of conflict in the way 'JKL' uses the 
printer DCB. However, you can get manual screen dumps by 
using the CNTRLt (shift down-arrow asterisk). You cannot 
spool from SCRIPSIT! (Why would you want to?) So be sure 
you have run tCLOSE, which also restores the printer DCB, 
before trying to print from SCRIPSIT. 

The listing below was made using the tSPOOL and tCLOSE 
routines while running EDTASM. Then SCRIPSIT was used to 
append this text and to shorten the listing by deleting 
string characters and addresses. It is great to be able to 
do this while running BASIC or EDTASM or VISICALC. Then 
you can combine all the bits and pieces using SCRIPSIT 
before actually printing a docu m ent . 

This utility is available on SBUG-BO. To get the 

machine code program just DFT SPOOLSET/CMD from INDEX and, 

if you are interested in studying and/or modifying the 

routine, SPOOLSET/ ASH is also available so you will not 
have to type the program into EDTASM. 

Vigo Smith 
VIGO 9 SBUG-80 



START 

I tSPOOL WILL RUN ROUTINE 

; HI MEM STORAGE-MODEL III 

; REFERENCE: 80 MICRO MARCH 1980 PAGE 46 ttt H. S. GENTRY 
I THIS IS THE PRINTER SPOOLER - WHEN LOADED 
;IT WILL INTERCEPT ALL PRINTER OUTPUT AND 
; STORE IT IN A 256 BYTE BUFFER WHEN THE 
i BUFFER IS FULL THE DATA IS WRITTEN TO 
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ORG 


OFDFOH 


DEFS 


04H 


DEFM 


'SPOOL 


JR 


SETUP 


ORG 


4411H 


DEFW 


OFDCFH 
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;THE SPECIFIED FILE. THE SPOOL FILE MUST 
;BE CI OSED BY RUNNING THE SYSTEM PROGRAM 
; CLOSE. 

; 

DISP EQU 4467H 

INPUT EQU 40H 

PRDD EOU 4026H 

DOS EQU 402DH 

CLOSE EQU 4428H 

INIT EQU 4420H 

WR I TE EQU 443CH 

; 

ORG OFEOOH 

SETUP LD HL.MSG1 

CALL DISP 

LD HL.INBFR 

LD B,32 

CALL INPUT 

LD A,B 

OR A 

JR Z, SETUP 

EX DE.HL 

ADD A,E 

LD L,A 

LD A,D 

ADC A,0 

LD H,A 

LD (HL),20H 

;INBFR NOW HAS FILE SPEC WITH TRAILING BLANKS 
j INIT THE FILE 

LD HL, BUFFER 

LD DE, INBFR 

LD B,0 

CALL INIT 

JR Z,OK 

LD HL.ERM 

CALL DISP 

JP DOS 

OK LD HL, (PRDD) 

LD <SAVDD),HL 

LD HL, DRIVE 

LD (PRDD),HL 

JP DOS 
I FILE IS OPEN - THIS IS THE ACTUAL DRIVER 

;IT WILL STUFF THE CHARACTERS IN THE BUFFER 

j IF THE BUFFER IS FULL A WRITE TO THE DISK 
j WILL BE DONE 

; 

DRIVE 



I LOG ON 

(GET ACTUAL « 

;NO INPUT 

* ADDRESS** 
I LOW ADDRES8 
;HI ADD 

I HI ADDRESS 
(BLANK CR 



I PLACE 
|DCB 

(OPEN IT 
|Z-1 IF OK 



)AND GET OUT 
fOLD DRIVER 
(SAVE IT 
(NEW DRIVER 
I PUT IT IN 
(DONE 



PUSH 


HL 




PUSH 


AF 




LD 


HL, <PRT) 


I POINT TO BUFFER 


LD 


<HL),C 


(SAVE CHARACTER 


INC 


HL 




LD 


(PRT) ,HL 




LD 


A, (CCNT) 


; COUNT 


CP 


OFFH 


;DUN 
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JR 


Z.OUT 










INC 


A 






; COUNT IT 




LD 


(CCNT) ,A 






;PUT IT BACK 


POP 


POP 
POP 
RET 


AF 

HL 






:BO BACK 


OUT 


PUSH 
PUSH 
PUSH 
PUSH 


BC 
DE 
IX 
IV 










LD 


DE, INBFR 






xDCB 




CALL 


WRITE 










LD 


HL, BUFFER 










LD 


(PRT),HL 






» RESTORE POINTER 




XOR 


A 






;A=0 




LD 


<CCNT>,A 










POP 


IY 










POP 


IX 










POP 


DE 










POP 


BC 










JR 


POP 








j THIS 


IS THE 


CLOSE ROUTINE 


— 


CALLED BY 


;THE CLOSE FUNCTION TO CLOSE 


OUT THE LAST 


; RECORD AND THEN CLOSE THE 


FILE 




START2 


! DEFS 


04 










DEFM 


'CLOSE 






; (CLOSE WILL RUN 


KLOSE 


LD 

OR 


A, (CCNT) 
A 






1 COUNT 




JR 


Z,KLOS 






jNO DATA CLOSE FILE 


j DATA 


IN FILE 


- NULL REMAINDER 


THEN WRITE AND CLOSE 




LD 


HL, <PRT) 








LOPC 


LD 


(HL),0 










CP 


OFFH 






iDUN 




JR 


Z,WRIT 






jFULL WRITE IT 




INC 


A 










INC 


HL 










JR 


LOPC 









I THIS IS THE WRIT TO THE DISK ROUTING 

|OCB 



WRIT LD DE, INBFR 

- CALL WRITE 
iTHIS IS THE CLOSE ROUTINE - IT WILL CLOSE THE 
iFILE 

DE, INBFR 

CLOSE 

HL, (SAVDD) 

(PRDD),HL 

DOS 

HL, START 

NAME 

HL,START2 

NAME 

DOS 

4461H 

BUFFER 



KLOS 



BEGIN 



NAME 
PRT 
CCNT 
SAVDD 



LD 

CALL 

LD 

LD 

JP 

LD 

CALL 

LD 

CALL 

JP 

EQU 

DEFW 

DEFW 

DEFW 



|DCB 



I RESTORE PRINTER 

I DONE 

I ROUTINE START ADDRESS 

itNAME ENQUEUE 

jtCLOSE ROUTINE 

; RETURN TO DOS 
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INBFR DEFM 

MSG1 DEFM 'SPOOL FILESPEC?' 

DEFB 3 

ERM DEFM 'SPOOL ERROR' 

DEFB 3 

BUFFER DEFB O 

END BEGIN 



S BUG- 80 MAIL CORNER 

<Message from PETE at SBUG-80 01/01/83 20:59:57> 
RE: 'DIRALL/V2F' DISK DIRECTORY PACKAGE 

REVISION BY PETE HUNTSINGER 'PETE* 
PLEASE NOTE THE REVISED 'DIRALL/V2F' PACKAGE NOW 
ON THE BOARD. THIS REVISION HAS MANY ADDED FEATURES 
OVER THE ORIGIONAL CURRENTLY LISTED. 

FIRST: YOU CAN NOW USE FOUR DIGIT DISK NUMBERS INSTEAD 
OF ONLY THREE. THIS ALLOWS A 3 DIGIT NUMBER AND A LETTER 
TO DESIGNATE DISK SIDE. 

SECOND: THE DIRECTORY FILE NOW WILL CONTAIN ALL IMPORTANT 
DISK INFORMATION! DISK NAME-DISK DATE-NUMBER OF FREE 
GRAINS-DISK NUMBER. YOU CAN DO A MULTIPLE DISK DELETE, 
ALONG WITH DISK ADDITIONS IN A SINGLE PASS. ADDED IS THE 
ABILITY TO CREATE A FILE'DIRLIST* WITH SCRIPSIT (NOTE USE 
WIDTH-64) AND 'LIST* FROM PROGRAM FURTHER DETAILS FOR A 
GIVEN DISK MERGE WILL AUTOMATICALLY ACCOMMODATE UP TO EIGHT 
DISK FILES OF UP TO 40 DISKS WITHOUT USER CONCERN 
OVER RESERVING BUFFERS ALSO, PROTECTION IS NOW BUILT IN TO 
INSURE USER WILL NOT UNKNOWINGLY WRITE OVER AN EXISTENT 
DISK INDEX FILE. THERE ARE MANY MORE FEATURES, BUT I DON'T 
FEEL I SHOULD HOLD UP THE BOARD WITH MY 'SNAIL PACE' 
TYPING. TRY IT OR LEAVE A MESSAGE IF YOU HAVE FURTHER 
QUESTIONS. 

USERS. I NEED ASSISTANCE. THIS IS A REWRITE OF A REWRITE 
AND THE CODE IS A LITTLE MESSY. ALSO, I FEEL I'M TOO CLOSE 
TO THE PROGRAM NOW AND I AM HAVING DIFFICULTY RESOLVING 
TWO REMAINING PROBLEMS WITH THE PROGRAM. 

FIRST: IN SORT-BY-FILE USING PRE-SORTED FILES YOU BET A 
'-' AT THE END OF EACH FILE LISTj WHY I DON'T KNOW 

SECOND: MERGE BY FILE. THE SCREEN PRINT IS A JAMMED 
FOUR COLUMN LIST AND I WOULD LIKE TO CHANGE THIS TO 
THREE TO CLEAN-UP THE PROGRAM. THIS PROBLEM 
RESULTED FROM EXPANDING DISK NUMBER TO FOUR PLACES. 
ALL LPRINT FORMATS A LETTER PERFECT. CHEERS, HAPPY 
USE AND PLEASE, PLEASE GIVE FEEDBACK. 

<Message from COMPVISN at SBUG-80 01/03/83 11: 13:41 > 
RE: NEW 
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JUST GOT IN TRS 2.3 COMMENTED BY IJG. IT IS OVER 

300 PAGES OF DETAILED INFORMATION. I WISH WE HAD 

MORE INFORMATION LIKE THIS AROUND. PRICE IS «29.9S. 

•ttttt*** 

DIABLO HAS ANNOUNCED A PRICE REDUCTION IN THEIR LETTER 

QUALITY DAISY WHEEL HOME COMPUTER PRINTER THE &20. 

NEW PRICE IS S1395. MY PRICE WILL BE Si 195. 

«*tt**tt*t 

NEW GAMES IN ARE DEMON SEED, CYBORG, CHICKEN, LUCIFERS 

REALM <AN ADVENTURE), REAR GUARD, CRAZY PAINTER AND 

LASER BALL. 

Oiessage from BERN IE at SBUG-80 01/06/83 OOi50i29> 
RE: Items ■for sale. 

Comprint 912 printer which uses aluminized paper. *330. 

Trendata printer (Selectric Typewriter) with electronics, 
mounted in caster table stand also an add on tractor 
feeder, 4 different typing elements, complete typewriter 
service manual, cable for attaching to Model I and a 
driver program. The typewriter may be used in a LOCAL 
mode. ♦550. 



SOFTWAREi (DISK) 

French to English translation TLF-SO. •10. 

Deluxe Personal Finance. *15. 

Information Storage fc Retrieval. (ISAR) »25. 

Level II Basic (4 disks, B lessons) *12. 

Check Write (R A Shmina) Personal Finance 910. 

Interactive Data Manager »15. 



ORIGINAL TAPESl 

Cload Magazine (12) March '78-Feb '79 *22. 

(This would be a nice library gift.) 

Level II Data Conversion. *2. 

Level II Program Conversion. *2. 

Blackjack tt Backgammon (Level I) *2. 

Level" II Blackjack & Backgammon »2. 

Radio Shack Terminal II *2. 
Recipe Conversion fc Message Center 26-1601 tl. 

Keyboard Denounce Systems f KBFIX (side 1) 
Keyboard Deb ounce /Real Time Clock System 

SRELO (side 2) both Level II *3. 

Miscl other tapes (some with programs) si. 50 



BOOK i TRS-80 Disk It Other Mysteries elS. 

Paper for printer (3 boxes some carbon)ea. *17.50 

Contact Bernie (Thompson) Phone (409) 867-7453 

or via Bulletin Board (weekly check in). <BERNIE> 

I plan to have some items with me at each meeting, if 
you want to see a particular item there, let me know. Or 
drop by at 20738 Woodward Ct. Saratoga by appointment. 
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-'Message from RON at SBUG-BO 01/06/83 10:21: 18> 
RE: MICROSHELL. UNIX FOR CP/M USERS 

I JUST BOUGHT T MICROSHELL WHICH IS A PSEUDO-UNIX FOR ANY 
STANDARD CP/M SYSTEM. IT HAS 'PIPES' 8. OTHER EXOTIC THINGS 
I HAVEN'T GOTTEN AROUND TO PLAYING WITH IT (BECAUSE I 
ALWAYS KEEP MY COMPUTER IN A MESS OF NON-WORKING PIECES), 
BUT WOULD BE HAPPY TO SHOW IT TO SOMEONE WITH A CP/M 
ADAPTER BOARD IN THEIR TRS-80. ALSO, I ORDERED A DEMO 
VERSION OF JANUS (ADA SUBSET) FOR S30 ! I'M AFRAID IT MAY 
NEED 56K MEMORY, SO ONLY THE MARTIN CP/M ADAPTER BOARD MAY 
BE USEABLE. ANYWAY, THE MANUAL SHOULD BE WORTH THE S30. 

P.S.- I BOUGHT TRSDOS2.3 DECODED FROM BRUCE CARSO 
(COMPUTERVISIONS) . IT LOOKS t« GREAT**. LOTS OF TUTORIAL 
TEXT, NOT JUST ASSEMBLY CODE!!! HE ALSO TALKED ME INTO A 
BOOK CALLED INSIDE SUPER UTILITY. IT'S A TUTORIAL ON USING 
SU+, BUT HAS LOADS OF VALUABLE INFO ON DISKS/DOS' S. 
EXPENSIVE (*20) AND SMALL (80 PAGES, EXCLUDING SU+ ENTRY 
POINTS) BUT INTERESTING «• USEFUL ENOUGH TO MAKE IT WORTH 
IT. (IJG IS COMING OUT WITH AN UPGRADE TO THE 1ST BOOK, 
DOS MYSTERIES BY PENNINGTON IN 'N' MONTHS* THAT WOULD BE A 
BETTER ALTERNATIVE. 

P.P.S.- WHILE I'M IN A TYPEATIVE MOOD, I HAVE A DESIGN FOR 
A CP/M PC BOARD-WOULD ANYONE WANT TO DONATE A LARGE AMOUNT 
OF PC BOARD LAYOUT Si ETCHING HELP TO ME? 

REi SBUG-80 DISKS — SOUTH VALLEY EL. HAS DOUBLE SIDED 8" FOR 
ABOUT *2SO EACH. IF WE COULD GET 20 MORE MEMBERS, «25 
MAYBE SBUG COULD BUY IT'S OWN 2.4 MEGABYTES! ! ! 
(I'M REMOTELY THINKING OF GETTING A MAX-BO FROM LOBOf IF 
I DID I WOULD NEED MY 8" DRIVES BACK). 

<Message fro* GLENN at SBUG-BO 01/09/83 01tS6t54> 
RE: BASICPRT/CMD 

I HAVE UPLOADED TWO FILES TO THE SYSTEM. 

1) BASICPRT/ASM ASSEMBLY SOURCE FOR BASICPRT/CMD 

2) BASICPRT/CMD A BASIC PROGRAM LISTER 

THE PROGRAM 'BASICPRT/CMD' WILL LIST BASIC PROGRAMS FROM 
DISC. IT WILL GENERATE A NEW LINE FOR EACH '■' ENCOUNTERED 
IN THE SOURCE, IT ALSO INDENTS AND PRINTS ALL 'ELSE' AND 
'THEN' STATEMENTS ON A SEPARATE LINE. THE PROGRAM MUST BE 
IN THE BINARY COMPRESSED FORMAT - IT CANNOT BE SAVED IN 
ASCII. 

THE PROGRAM IS WRITTEN FOR THE MODEL I BUT SHOULD BE EASY 
TO MODIFY FOR THE MODEL III. THE SOURCE IS FULLY COMMENTED 
(MY FINGER TIPS ARE GONE FROM TYPING) BUT I WILL ANSWER 

BEFORE ANYONE COMES BACK AT ME - I KNOW SOME OF THE 
PROGRAM COULD BE WRITTEN TO BE LESS REDUNDENT, BUT IT IS 
WRITTEN FOR EASIER MODIFICATION. 
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TRY IT AND LET ME KNOW WHAT YOU THINK. 

GLENN 

<Message from TIHULK at SBUG-80 01/10/83 20»34:19> 
REx MAX-BO 

LOOK IN THE JAN- 17, 1983 ISSUE OF INFOWORLD FOR REVIEW 
OF LOBO'S NEW COMPUTER THE MAX80. LOOKS LIKE A REAL VALUE. 
WITH A LITTLE LUCK I WILL HAVE ONE SOON. 

TIHULK 

< Message from RON at SBUG-80 01/11/83 13s37t32> 
REi MAX -80 GREAT VALUE (TIHULK MSG) 

ANYONE ELSE HAVE ANY INFO ON IT? I THINK IT WOULD BE 
PERFECT FOR ME-A WORKING SYSTEM IN A CLEAN CASE! • 
FULL CP/M. I BET I WILL »NOT« RUN SUPER UTILITY, 
MY MOST USED SOFTWARE. 
JERRY, WHEN IS YOURS COMING^ 

< Message from MSILLS at SBUG-80 01/ 12/83 20t51i4S> 
REi COMPILERS 

I Mould like to talk with anyone who has used ACCEL2 or 
ACCEL3. I have triad Microsoft' a Compiler and found it 
too complicated and frankly too difficult to usa. Recently 
I tried ZBASIC, but it seema to require considerable 
translation before ZBASIC can compile (and frankly I'm 
not able to deal with the translating yet.) 
If anyone can offer their opinion of Accel I'd really 
welcome it. 

Please contact me here at BBUG-BO or at home — 225-0607 

Mark Sills (MSILLS) 

< Message from EDITOR at SBUG-80 01/13/83 22i02t08> 
REi Info on someone using an Altair 8800 system. 

Hi gang... I would like to talk to someone who 
o w ns and uses an Altair system. If anyone knows 
soma one who does, would you have them get in touch 
with me? I want to set it up using CP/M. I would 
appreciate the help... Please have them give 
me a call. (408) 732-6773 
ThanM ... Rob ... 

< Message from JLYNCH at SBUG-80 01/13/83 08i34i30> 
REi TOUCH-UP PAINT FOR MOD III 

WOULD ANYONE OUT THERE KNOW WHERE I CAN BUY TOUCH-UP 
PAINT TO COVER NICKS ON THE MOD III CASE? I KNOW THERE 
WAS A SHORT INFO ITEM ON SPRAY PAINT THAT MATCHES THE 
MOD III IN A COMPUTER MAGAZINE A FEW MONTHS AGO BUT I 
WOULD PREFER A BRUSH ON TYPE. WOULD APPRECIATE THE 
HELP. 

<Message from PETE at SBUG-BO 01/13/83 23i4Bi25> 
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RE* DIRECTORY PROGRAMS 

RECENTLY I PLACED A REVISION TO DIRALL CALLED DIRALL/V2A 
FOR WHICH I PUT NEARLY 60 HOURS CLEANING UP. I DON'T KNOW 
IF ANY OF YOU DOWNLOADED IT BUT I DO KNOW I RECEIVED 
'ZERO' RESPONSE TO MY REQUEST FOR COMMENTS. I'VE BEEN 
RECENTLY TOLD BY A MASS. FIRM TO REWRITE THE PROGRAM 
IN ASSEMBLY FOR A TIDY SUMi A TESTIMONIAL THAT THEIR MUST 
BE SOME 'GUTS' TO WHAT I ADDED. WHAT INCENTIVE IS THEIR TO 
SHARE WITH FELLOW MEMBERS IF THEIR IS 'ZERO' FEEDBACK??? 

'Message fro* MCHENRY at SBUG-80 01/16/83 21l04il3> 
RE: MX-BO RIBBON RELOADS. . . 

Hi All.... I purchased three of the MX-BO ribbon reloads 
from the club and had some problems loading thee into the 
cassettes. The instructions tell you to Make sure that you 
unwind the ribbon fro* the roll without twisting it. I 
found this hard to do and ended up with a mess that took 
about an hour to untangle. For the next one I tried a new 
Method. .. .Put a nail or something in the center of the tape 
roll and unroll the tape into a clean bucket or box. Then 
feed the end of the loop through the open tape cassette, 
close it up, and wind the tape back into the cassette. 
This worked great with no twisting or tangles. By the way, 
Wisk laundry cleaner works great to get ink off your 
hands. Bee you all Tuesday. 

Mike 

<Message fro* ROGERAND at SBUG-BO 01/1B/83 22i4SiS2> 
REs MICROSOFT 

HI ALL, 

THE NEW COPY OF COMPUTRONICS (FEB. 83) HAS THE FOLLOW- 
ING IN THEIR "NEWS AND RUMORS COLUMN" i 

WE HAD A BIB SURPRISE RECENTLY WHEN WE TRIED TO 
REPLENISH OUR INVENTORY BY PLACING AN ORDER FOR TRS-BO 
SOFTWARE FROM MICROSOFT. WE COULD HARDLY BELIEVE IT, 
BUT WE WERE INFORMED THAT ONCE THEIR PRESENT LOW SUPPLIES 
RUN OUT, THERE WILL BE NO MORE TRS-80 MODEL I/I 1 1 SOFT- 
WARE AVAILABLE FROM MICROSOFT. 

THE ARTICLE GOES ON TO TALK ABOUT THE FACT THAT THE 
TRS-80 MADE MICROSOFT WHAT IT IS TODAY. 
FOOD FOR THOUGHT, HUH? 
ROGERAND 

< Message fro* EDITOR at SBUG-BO 01/19/83 12i40ill> 
REl Membership It Dues! 

Hi again... Ramsebsr the agreement that we Made when 
you paid for your account on SBUG-BO. What agreeeent? 
It was decided that there would be a one time *25 fee 
for an account on SBUG-BO provided you Maintain 
in good standings your m c eta er ship with SBUG. So, if 
you have not paid your dues for 83 please send it to 
5 BUGs' P.O. Boh right away... (IN NEWSLETTER) 
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Why the concern? Well, for one thing I'M an unemployed 
student struggling through college. X don't wind 
helping out with some (LOTS) of my free time but, don't 
ask me to dig in my pocket because I will pull out 
nothing but pocket thread! This is all for you and if 
you want this organization to work then realize that the 
publisher of the newsletter will not take pocket thread 
in payment. Could you imagine what would happen 
when Ma Bell opens our payment and observes a few 
denim strings (SBUG-BO cut off!) 

Come on gang help out... Is slB per year, tl.50 pmr 
month, all that much? 

I think SBUG is the best! 

What do you think? Rob... 

<Message from BILLRAM at SBUG-BO 01/20/83 14i48t48> 
RE: WANTED 

I have a friend who is looking to buy a used 
MODI II. If you know of one for sale at a somewhat 
reasonable price, please leave a message for me here 
of call 408 255-2854 (Bill — evenings) or 415 497-3188 
(ask for Florence and identify your reason for calling.) 
The latter number is the Music Department at Stanford. 

<Message from PHANTOM at SBUG-80 01/21/83 19: 41 i 36 > 
REi ORCH 85 

HI ALL, 

I am looking for information about the 0rch85. I 
would like to find a patch to the main program to use the 
DOS keyboard driver so that it can be used with a program 
to ex cute a disk full of programs, rather than Just the 
single line that is normally available. Also the schematic 
I got at the last meeting was for 0rch80. Does anyone have 
a schematic for the OrchBS a dual channel OrchBO. If there 
is a way to drive this device in the background I will need 
a schematic in order to do this 

Any or all help in this matter would be greatly 
appreciated. In the mean time I will keep poking away 
with Tasmon. 

The Phantom. ... 

<Message from ROGERAND at SBUG-80 01/22/83 13i51l32> 
RE: NEW SOFTWARE STORE 

THERE IS A NEW SOFTWARE STORE IN SUNNYVALE ON THE 
EL CAMINO. 

SOFTWARE CENTER 

730 E. EL CAMINO REAL 
BETWEEN WOLFE AND FAIR OAKS NEXT TO THE BLACK ANGUS 
RESTAURANT. 

I WAS IN THE STORE FOR A SHORT TIME THEY APPEAR TO 
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HAVE A GOOD STOCK OF BOOKS TRS-80, ATARI, It IBM SOFTWARE. 
THEY ARE GOING TO HAVE A GRAND OPENING ON FEB. 26. 

THEY ALSO ARE GOING TO HOLD SEMINARS AND ARE INTER- 
ESTED IN COMING TO MEETINGS AND GIVING TALKS. THEY 
WILL ALSO HAVE A TRS-80 LOOK-A-LIKE FOR TESTING PROGRAMS 
BEFORE BUYING. 

ROGERAND 

'Message from BLAINE at SBUG-SO 01/22/83 15s 03s 29 > 
RE: UCSD PASCAL 

Does anyone have information on versions of UCSD PASCAL 
♦or the Model I? I was told that the best version is 
sold by Softec Micro Systems but can find no reference. 
Are there other versions of PASCAL on the Model I 
that are better? 
Thanks, Dick 

<Message from MSILLS at SBUG-80 01/23/83 22l 16l 13> 
REs THANKS 

I have had the pleasure of using the SBUG-80 Bulletin 

Board for several months now. 

I continue to enjoy "Getting on the Board" and have 

learned a good deal -from the interaction, as well as 

from the programs that I have downloaded. 

I -firmly believe that a word (actually several words) of 

thanks are in order for the people that make the Board 

run. I am really not sure that I know them all so if I 

miss any one please excuse my ignorance. Anyway to 

Rob, Eric, Mike and the others that I have no doubt missed, 

thanks it is a BLAST !! 

Mark Sills 
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